From: Katsumi Yamaoka Date: Wed, 30 Apr 2014 04:21:08 +0000 (+0000) Subject: lisp/gnus/gnus-art.el (gnus-mm-display-part): Fix previous commit X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~23^2~3423^2~1717 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=70c1d22fe226b56e3959cfe9605dbd991abf60ee;p=emacs.git lisp/gnus/gnus-art.el (gnus-mm-display-part): Fix previous commit --- diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el index ef50a0064ae..e3605cd5fef 100644 --- a/lisp/gnus/gnus-art.el +++ b/lisp/gnus/gnus-art.el @@ -5679,7 +5679,11 @@ all parts." (delete-region (previous-single-property-change end 'gnus-data) end)) (gnus-insert-mime-button handle id (list (mm-handle-displayed-p handle))) - (delete-char -1) + (let ((pt (point))) + (if (search-backward "\n\n" nil t) + (goto-char pt) + ;; We're in the article header. + (delete-char -1))) (goto-char point)) retval))